﻿Imports Mysoft.Map.Workflow


Partial Public Class ProcessModule_Maintenance
    Inherits System.Web.UI.Page

    Protected PMInfo As ProcessModuleInfo

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Session("UserGUID") Is Nothing OrElse Session("UserGUID") = "" OrElse Session("MySessionState") Is Nothing OrElse Session("MySessionState") = "" Then
            MyBase.Response.ContentType = "Text/HTML"
            MyBase.Response.Clear()
            MyBase.Response.Write("服务器超时")
            MyBase.Response.End()
            Return
        End If

        If Not IsPostBack Then
            Dim pmGUID As String = Request.QueryString("ProcessModuleGUID")

            If String.IsNullOrEmpty(pmGUID) Then
                PMInfo = New ProcessModuleInfo()
            Else
                PMInfo = New ProcessModuleInfo(pmGUID)
            End If

            'Action
            'BusinessTypeName
            'ExtendFormUrl
        End If
    End Sub


End Class

